home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 37 / CD Expert nº 37.iso / LastCall / lastcall.exe / stuff / lastcall.dxr / 00102_StartGame.ls < prev    next >
Encoding:
Text File  |  2000-03-27  |  709 b   |  23 lines
  1. on exitFrame
  2.   global gFastPlay, gMode, gUserAnswer, gDemoVersion
  3.   menuMode(1)
  4.   gMode = #game
  5.   if gDemoVersion and not authoring() then
  6.     setGameSchedule(0)
  7.   else
  8.     if gFastPlay then
  9.       titleText = "Shift Length?"
  10.       promptText = "Would you like to play an abbreviated version of the game or play each shift for the normal duration?"
  11.       multiButtonDialog(["Abbreviated", "Normal"], [#MAC: [25, 250], #Win: [20, 140]], "Normal", titleText, promptText, [#MAC: 350, #Win: 200], [#MAC: 50, #Win: 35])
  12.       if gUserAnswer = "Abbreviated" then
  13.         setGameSchedule(1)
  14.       else
  15.         setGameSchedule(0)
  16.       end if
  17.     else
  18.       setGameSchedule(0)
  19.     end if
  20.   end if
  21.   startNewGame()
  22. end
  23.